home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / The World of Computer Software.iso / ply15dat.zip / WOODCHAI.INC < prev    next >
Text File  |  1992-09-17  |  883b  |  24 lines
  1. // Let's make a chair, extends from <0, 0, 0> to <3, 6, 3>
  2. define leg_wood reddish_wood { rotate <90, 0, 0> }
  3. define wooden_chair
  4. object {
  5.    // Legs
  6.    object { box <0, 0,   0>, <0.4, 6,   0.4> leg_wood } +
  7.    object { box <0, 0,   0>, <0.4, 2.5, 0.4> translate <2.2, 0, 0  > leg_wood} +
  8.    object { box <0, 0,   0>, <0.4, 2.5, 0.4> translate <2.2, 0, 2.8> leg_wood} +
  9.    object { box <0, 0,   0>, <0.4, 6,   0.4> translate <0,   0, 2.8> leg_wood} +
  10.    // Top bars
  11.    object { box <0, 5.6, 0>, <0.4, 6,   3.2> reddish_wood } +
  12.    object { box <0, 4.8, 0>, <0.4, 5.2, 3.2> reddish_wood } +
  13.    object { box <0, 4,   0>, <0.4, 4.4, 3.2> reddish_wood } +
  14.    object { box <0, 3.2, 0>, <0.4, 3.6, 3.2> reddish_wood } +
  15.    // Seat
  16.    object {
  17.       box <0, 2.5, 0>, <2.6, 2.7, 3.2>
  18.       reddish_wood {
  19.      rotate <90, 0, 0>
  20.      translate <1.3, 0, 1.6>
  21.      }
  22.       }
  23.    }
  24.